(xcharset): Fix previous change.
authorKenichi Handa <handa@m17n.org>
Tue, 7 Jul 2009 06:22:05 +0000 (06:22 +0000)
committerKenichi Handa <handa@m17n.org>
Tue, 7 Jul 2009 06:22:05 +0000 (06:22 +0000)
src/.gdbinit

index 83314919e2717ebfa18802275a433cb622516c0f..5c7e6d8e5259fcf894fa60b60298c014b2345d28 100644 (file)
@@ -1009,7 +1009,7 @@ end
 define xcharset
   set $tmp = (struct Lisp_Hash_Table *) ((Vcharset_hash_table & $valmask) | gdb_data_seg_bits)
   set $tmp = (struct Lisp_Vector *) (($tmp->key_and_value & $valmask) | gdb_data_seg_bits)
-  p $tmp->contents[$arg0 * 2]
+  p $tmp->contents[charset_table[$arg0].hash_index * 2]
   pr
 end
 document xcharset